cyber.net interactivo 5/inter@ivo 1996-06.iso/cybint5/bin/gforum.dxr/00039.ls

Text File | 1996-05-13 | 348 b | 20 lines

on exitFrame
  set i to 8
  if rollOver(16) then
    go("g")
  end if
  if the mouseCast = 50 then
    go("naveg")
  end if
  repeat while i < 17
    if rollOver(i) then
      set the visible of sprite (i - 6) to 1
    else
      set the visible of sprite (i - 6) to 0
    end if
    set i to i + 1
  end repeat
  updateStage()
  go(the frame)
end